home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 162 / 162.d81 / mr.icon 9000 (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  4KB  |  137 lines
  1. 10 rem **************************
  2. 11 rem *       mr. icon         *
  3. 12 rem * for mr. mouse at $9000 *
  4. 13 rem **************************
  5. 20 poke53264,0:poke53271,0
  6. 22 poke53275,0:poke53276,0
  7. 24 poke53277,0:poke2040,11
  8. 26 poke52,144:poke56,144:clr
  9. 30 forn=0to48
  10. 32 readnn
  11. 34 poke37247+n,nn
  12. 36 next
  13. 40 forn=0to895
  14. 42 readnn
  15. 44 poke49152+n,nn
  16. 46 next
  17. 50 print"[154]mr.icon installed!"
  18. 52 new
  19. 100 data32,32,155,140,39,208,169,0,133
  20. 101 data174,169,192,133,175,138,240,14
  21. 102 data24,165,174,105,64,133,174,144
  22. 103 data2,230,175,202,208,242,160,0
  23. 104 data177,174,153,192,2,200,192,64
  24. 105 data144,246,169,1,141,21,208,96
  25. 106 data255,224,0,255,128,0,222,0
  26. 107 data0,206,0,0,199,0,0,251
  27. 108 data128,0,237,192,0,198,224,0
  28. 109 data195,112,0,1,184,0,0,220
  29. 110 data0,0,110,0,0,60,0,0
  30. 111 data24,0,0,0,0,0,0,0
  31. 112 data0,0,0,0,0,0,0,0
  32. 113 data0,0,0,0,0,0,0,0:rem *end1*
  33. 114 data0,126,0,3,255,192,15,255
  34. 115 data240,31,231,248,63,231,252,127
  35. 116 data231,254,127,231,254,255,231,255
  36. 117 data255,231,255,255,231,255,255,231
  37. 118 data255,255,243,255,255,249,255,127
  38. 119 data252,254,127,254,126,63,255,60
  39. 120 data31,255,248,15,255,240,3,255
  40. 121 data192,0,126,0,0,0,0,0:rem *end2*
  41. 122 data0,252,0,7,255,128,31,255
  42. 123 data224,63,255,240,112,63,248,254
  43. 124 data96,124,252,252,252,249,249,252
  44. 125 data243,243,252,112,39,248,127,224
  45. 126 data112,63,255,224,31,255,128,1
  46. 127 data252,0,0,0,240,0,1,248
  47. 128 data0,0,224,0,0,12,0,0
  48. 129 data30,0,0,12,0,0,0,0:rem *end3*
  49. 130 data224,0,0,240,0,0,248,0
  50. 131 data0,124,0,0,62,0,0,31
  51. 132 data14,0,15,143,0,7,207,128
  52. 133 data3,231,128,13,247,192,14,251
  53. 134 data192,7,127,224,27,255,224,29
  54. 135 data255,224,15,255,240,55,255,240
  55. 136 data59,255,240,63,255,240,31,255
  56. 137 data248,15,255,252,3,255,254,0:rem *end4*
  57. 138 data192,0,0,96,0,0,48,0
  58. 139 data0,24,0,0,12,14,14,14
  59. 140 data27,27,14,25,243,12,27,255
  60. 141 data28,15,118,28,3,252,56,3
  61. 142 data220,56,13,248,56,30,115,56
  62. 143 data63,143,60,118,255,30,113,253
  63. 144 data15,127,254,7,250,252,3,247
  64. 145 data123,1,239,143,0,254,246,0:rem *end5*
  65. 146 data127,255,254,221,152,131,221,109
  66. 147 data239,221,13,239,213,109,239,201
  67. 148 data109,239,221,104,239,255,255,255
  68. 149 data255,207,255,255,183,255,255,135
  69. 150 data255,255,183,255,255,255,255,227
  70. 151 data12,119,223,123,183,227,27,247
  71. 152 data253,123,247,221,123,191,227,12
  72. 153 data119,255,255,255,127,255,254,0:rem *end6*
  73. 154 data127,255,254,198,25,143,218,246
  74. 155 data183,198,48,183,218,246,183,218
  75. 156 data246,183,218,22,143,255,255,255
  76. 157 data248,168,255,253,137,255,253,171
  77. 158 data255,253,168,255,255,255,255,227
  78. 159 data155,119,237,107,119,237,108,247
  79. 160 data237,108,247,237,107,127,227,155
  80. 161 data119,255,255,255,127,255,254,0:rem *end7*
  81. 162 data0,0,0,7,255,224,15,255
  82. 163 data240,31,255,248,48,0,12,127
  83. 164 data255,254,227,24,195,221,183,93
  84. 165 data223,183,93,223,183,93,227,183
  85. 166 data67,253,183,95,253,183,95,221
  86. 167 data183,95,227,184,223,127,255,254
  87. 168 data48,0,12,31,255,248,15,255
  88. 169 data240,7,255,224,0,0,0,0:rem *end8*
  89. 170 data0,255,0,7,255,224,31,255
  90. 171 data248,63,255,252,124,60,62,112
  91. 172 data24,14,224,24,7,206,60,115
  92. 173 data255,255,255,255,219,255,227,195
  93. 174 data199,199,231,227,243,255,207,241
  94. 175 data255,143,120,126,30,124,0,62
  95. 176 data62,0,124,63,195,252,31,255
  96. 177 data248,7,231,224,1,255,128,0:rem *end9*
  97. 178 data0,255,0,7,255,224,31,255
  98. 179 data248,63,255,252,124,60,62,112
  99. 180 data24,14,224,24,7,206,60,115
  100. 181 data255,255,255,255,219,255,255,195
  101. 182 data255,255,231,255,255,255,255,255
  102. 183 data129,255,124,0,62,120,0,30
  103. 184 data48,255,12,63,255,252,31,255
  104. 185 data248,7,231,224,1,255,128,0:rem *end10*
  105. 186 data0,0,0,0,0,0,0,0
  106. 187 data0,0,0,0,15,129,240,63
  107. 188 data231,252,127,255,222,127,255,238
  108. 189 data127,255,238,63,255,220,31,255
  109. 190 data184,15,255,112,7,255,224,3
  110. 191 data253,192,1,255,128,0,255,0
  111. 192 data0,126,0,0,60,0,0,24
  112. 193 data0,0,0,0,0,0,0,0:rem *end11*
  113. 194 data0,0,0,0,0,0,0,0
  114. 195 data0,0,0,0,0,0,0,0
  115. 196 data0,0,3,231,192,7,255,224
  116. 197 data15,255,112,15,255,176,15,255
  117. 198 data176,7,255,96,3,254,192,1
  118. 199 data255,128,0,251,0,0,126,0
  119. 200 data0,60,0,0,24,0,0,0
  120. 201 data0,0,0,0,0,0,0,0:rem *end12*
  121. 202 data0,0,0,0,0,0,0,0
  122. 203 data0,0,0,0,120,0,0,204
  123. 204 data0,0,198,0,0,199,223,248
  124. 205 data127,255,254,0,248,0,127,255
  125. 206 data254,199,223,248,198,0,0,204
  126. 207 data0,0,120,0,0,0,0,0
  127. 208 data0,0,0,0,0,0,0,0
  128. 209 data0,0,0,0,0,0,0,0:rem *end13*
  129. 210 data0,0,0,0,0,0,0,0
  130. 211 data0,0,0,0,120,0,56,204
  131. 212 data0,240,198,3,192,199,223,0
  132. 213 data127,252,0,0,248,0,1,255
  133. 214 data254,7,223,248,29,192,0,113
  134. 215 data128,0,99,128,0,119,0,0
  135. 216 data62,0,0,0,0,0,0,0
  136. 217 data0,0,0,0,0,0,0,0:rem *end14*
  137.